# name : proc format char to char
# key : proc.format.char.to.char
# contributor: Shuguang Sun
# --
proc format${2: library=${3:fmtsearch};}
  value $${1:fmtname}
    "M"   = "A"
    "F"   = "B"
    other = "C";
run;